#pragma once

#include <iostream>
#include <string>
#include <cerrno>
#include <cstring>
#include <cstdlib>
#include <unistd.h>
#include <functional>
#include <unordered_map>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <sys/wait.h>
#include <signal.h>
#include <pthread.h>

#include "Log.hpp"
#include "nocopy.hpp"
#include "Comm.hpp"
#include "InetAddr.hpp"
#include "ThreadPool.hpp"

class TcpServer;

#define CONV(addr_ptr) ((struct sockaddr *)addr_ptr)
const static int default_backlog = 5; // TODO
using task_t = std::function<void()>;
using callback_t = std::function<void(int, InetAddr &)>;

// class ThreadData
// {
// public:
//     ThreadData(int sock, TcpServer *svr, struct sockaddr_in &peer)
//         : sockfd(sock), svr_ptr(svr), addr(peer)
//     {
//     }
//     int SockFd() { return sockfd; }
//     TcpServer *GetServer() { return svr_ptr; };
//     ~ThreadData()
//     {
//         close(sockfd);
//     }

// private:
//     int sockfd;
//     TcpServer *svr_ptr;

// public:
//     InetAddr addr;
// };

class TcpServer : public nocopy
{
public:
    TcpServer(uint16_t port) : _port(port), _isrunning(false)
    {
    }
    ~TcpServer()
    {
    }
    void Init()
    {
        // 1. 创建套接字 本质是文件 file fd
        _listensock = socket(AF_INET, SOCK_STREAM, 0);
        if (_listensock < 0)
        {
            // 创建套接字失败
            lg.LogMessage(Fatal, "create socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
            exit(Socket_Err);
        }
        lg.LogMessage(Debug, "create socket success, sockfd: %d\n", _listensock);

        // 固定写法，解决一些少量的bind失败的问题 -- TODO
        int opt = 1;
        setsockopt(_listensock, SOL_SOCKET, SO_REUSEADDR | SO_REUSEPORT, &opt, sizeof(opt));
        
        // 2. 填充本地网络信息
        struct sockaddr_in local;
        local.sin_family = AF_INET;         // 进行网络通信
        local.sin_port = htons(_port);      // 主机转网络的port
        local.sin_addr.s_addr = INADDR_ANY; // 绑定任意地址
        // 3. 绑定
        if (bind(_listensock, CONV(&local), sizeof(local)) != 0)
        {
            lg.LogMessage(Fatal, "bind socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
            exit(Bind_Err);
        }
        lg.LogMessage(Debug, "bind socket success, sockfd: %d\n", _listensock);
        // 4. 设置socket为监听状态，TCP特有的
        if (listen(_listensock, default_backlog) != 0)
        {
            lg.LogMessage(Fatal, "listen socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
            exit(Listen_Err);
        }
        lg.LogMessage(Debug, "listen socket success, sockfd: %d\n", _listensock);

        // 启动线程池
        ThreadNS::ThreadPool<task_t>::GetInstance()->Start();
        // 加载默认任务列表
        funcs.insert(std::make_pair("defaultService", std::bind(&TcpServer::DefaultService, this, std::placeholders::_1, std::placeholders::_2)));
    }
    void Service(int sockfd, InetAddr addr)
    {
        char buffer[1024];
        // 一直进行IO
        while (true)
        {
            ssize_t  n = read(sockfd, buffer, sizeof(buffer) - 1);
            if (n > 0)
            {
                // 读取成功
                buffer[n] = 0;
                std::cout << addr.PrintDebug() << "# " << buffer << std::endl;

                // 回显
                std::string echo_string = "server echo# ";
                echo_string += buffer;
                write(sockfd, echo_string.c_str(), echo_string.size());
            }
            else if (n == 0) // 在网络接口中使用read返回为0，表示读到了文件结尾（对端已经关闭了连接）
            {
                lg.LogMessage(Info, "client quit...\n");
                break;
            }
            else
            {
                lg.LogMessage(Error, "read socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
                break;
            }
        }
    }
    // static void *HandlerRequest(void *args)
    // {
    //     // 设置分离
    //     pthread_detach(pthread_self());
    //     //
    //     ThreadData *td = static_cast<ThreadData *>(args);
    //     td->GetServer()->Service(td->SockFd(), td->addr);
    //     delete td;
    //     return nullptr;
    // }
    void Start()
    {
        signal(SIGCHLD, SIG_IGN); // 如果对SIG_IGN进行忽略，子进程退出的时候，自动释放自己的资源
        _isrunning = true;
        while (_isrunning)
        {
            // 5. 获取连接
            struct sockaddr_in peer;
            socklen_t len = sizeof(peer);
            int sockfd = accept(_listensock, CONV(&peer), &len);
            if (sockfd < 0)
            {
                lg.LogMessage(Warning, "accept socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
                continue; // 一次获取不成功就一直获取
            }
            lg.LogMessage(Debug, "accept success, get n new sockfd: %d\n", sockfd);
            // 6. 提供服务
            // v1
            // Service(sockfd);
            // close(sockfd);
            //
            // v2 多进程（孙子进程处理）
            // pid_t id = fork();
            // if(id < 0)
            // {
            //     close(sockfd);
            //     continue;
            // }
            // else if(id == 0)
            // {
            //     // 子进程
            //     close(_listensock);
            //     if(fork() > 0) exit(0);
            //     // 孙子进程
            //     // 用孙子进程进行正常的连接，父进程进行等待，同时并发运行
            //     Service(sockfd);
            //     close(sockfd);
            //     exit(0);
            // }
            // else
            // {
            //     close(sockfd);
            //     pid_t rid = waitpid(id, nullptr, 0);
            //     if(rid == id)
            //     {
            //         // do nothing
            //     }
            // }
            //
            // v3 多进程（基于信号）
            // pid_t id = fork();
            // if (id < 0)
            // {
            //     close(sockfd);
            //     continue;
            // }
            // else if (id == 0)
            // {
            //     // 子进程
            //     close(_listensock);
            //     Service(sockfd);
            //     close(sockfd);
            //     exit(0);
            // }
            // else
            // {
            //     close(sockfd);
            // }
            //
            // v4 多线程
            // ThreadData *td = new ThreadData(sockfd, this, peer);
            // pthread_t tid;
            // pthread_create(&tid, nullptr, HandlerRequest, td);
            // 主线程和新线程，不需要关闭对应的文件描述符，只需要将线程设置为分离
            //
            // v5 线程池
            task_t t = std::bind(&TcpServer::Routine, this, sockfd, InetAddr(peer)); // 绑定任务
            ThreadNS::ThreadPool<task_t>::GetInstance()->Push(t);                    // 加载任务
        }
    }
    // 读取用户输入
    std::string Read(int sockfd)
    {
        char type[1024];
        ssize_t n = read(sockfd, type, sizeof(type) - 1);
        if (n > 0)
        {
            type[n] = 0;
        }
        else if (n == 0) // read如果返回值是0，表示读到了文件结尾(对端关闭了连接！)
        {
            lg.LogMessage(Info, "client quit...\n");
        }
        else
        {
            lg.LogMessage(Error, "read socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
        }
        return type;
    }
    // 对任务进行路由
    void Routine(int sockfd, InetAddr addr)
    {
        funcs["defaultService"](sockfd, addr);
        std::string type = Read(sockfd);
        lg.LogMessage(Debug, "%s select %s\n", addr.PrintDebug().c_str(), type.c_str());
        if (type == "ping")
            funcs[type](sockfd, addr);
        else if (type == "translate")
            funcs[type](sockfd, addr);
        else if (type == "transform")
            funcs[type](sockfd, addr);
        else
        {
        }

        close(sockfd);
    }
    // 设置默认任务列表
    void DefaultService(int sockfd, InetAddr &addr)
    {
        (void)addr;
        std::string service_list = " |";
        for (auto func : funcs)
        {
            service_list += func.first;
            service_list += "|";
        }

        write(sockfd, service_list.c_str(), service_list.size());
    }
    // 构建任务对应关系
    void RegisterFunc(const std::string &name, callback_t func)
    {
        funcs[name] = func;
    }

private:
    uint16_t _port;  // 端口号
    int _listensock; // listen套接字
    bool _isrunning; // 服务是否启动
    // TODO
    // 构建业务逻辑
    std::unordered_map<std::string, callback_t> funcs;
};
